home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / vision / programm / paintshp / source / ppd_demo.asm < prev    next >
Encoding:
Assembly Source File  |  1994-09-22  |  1.2 KB  |  40 lines
  1. ;* * * * * * * * * * * * * * * * * * * * * * *
  2. ;* DEMO-DUMMY-Druckertreiber \\\ Thomas Much *
  3. ;*    geschrieben mit GFA-Assembler 1.5      *
  4. ;* * * * * * * * * * * * * * * * * * * * * * *
  5.  
  6.           .TEXT 
  7.  
  8. magic:    .DC.l '@PPD'
  9. scradr1:  .DC.l 0
  10. scradr2:  .DC.l 0
  11. device:   .DC.w 0   ; Default=Par
  12. breite:   .DC.w 639
  13. hoehe:    .DC.w 399
  14. tsflag:   .DC.w 0
  15. resanz:   .DC.w 6   ; 7 Auflösungen
  16. rspointr: .DC.l resol
  17. pnpointr: .DC.l pname
  18. sflag:    .DC.w 3   ; Par & Ser
  19. alert:    .DC.l 0
  20. sres:     .DC.w 4   ; '360x180 m' = Default
  21. errchk:   .DC.w 0
  22.  
  23. call:     movem.l   d0-d7/a0-a6,-(sp)   ; Register retten
  24.           lea       magic(pc),a0        ; Datenanfangsadresse
  25.           move.w    #3,38(a0) ;           Rückgabe: "Routine nicht vorhanden"
  26.           movem.l   (sp)+,d0-d7/a0-a6   ; Register zurück...
  27.           rts                 ;           ... und raus
  28.  
  29. resol:    .DC.b ' 60x180 G',0
  30.           .DC.b '120x180 G',0
  31.           .DC.b '180x180 G',0
  32.           .DC.b '180x180 m',0
  33.           .DC.b '360x180 m',0
  34.           .DC.b '360x180 k',0
  35.           .DC.b ' 360x360 ',0
  36.           .DC.b '[1][ | | Dieser Treiber dient nur| zu Demonstrationszwecken !  ][   OK   ]',0
  37. pname:    .DC.b 'DEMOVERSION Dummy-Treiber',0
  38.  
  39.           .END 
  40.